home *** CD-ROM | disk | FTP | other *** search
/ Amiga Tools 5 / Amiga Tools 5.iso / tools / developer-tools / c-tools / c_examples / tapedeck / tapedeck_example.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  1996-05-19  |  1.9 KB  |  76 lines
  1. //////////////////////////////////////////////////////////////////////////////
  2. // TapeDeck Example
  3. // 5.18.96 Deryk Robosson
  4.  
  5. //////////////////////////////////////////////////////////////////////////////
  6. // Includes
  7. #include "aframe:include/amigaapp.hpp"
  8. #include "aframe:include/window.hpp"
  9. #include "aframe:include/rect.hpp"
  10. #include "aframe:include/reqtools.hpp"
  11. #include "aframe:include/tapedeck.hpp"
  12.  
  13. //////////////////////////////////////////////////////////////////////////////
  14. // ControlWindow Class Definition
  15.  
  16. class ControlWindow : public AFWindow
  17. {
  18. public:
  19.     virtual void OnGadgetUp(LPIntuiMessage imess);
  20.  
  21.     AFTapeDeck td;
  22.     AFReqTools rt;
  23. };
  24.  
  25. //////////////////////////////////////////////////////////////////////////////
  26. // ControlWindow Implementation routines
  27.  
  28. void ControlWindow::OnGadgetUp(LPIntuiMessage imess)
  29. {
  30.   switch(((struct Gadget*)imess->IAddress)->GadgetID) {
  31.     case 100:
  32.         switch(td.GetCurrentButton()) {
  33.             case BUT_PLAY:
  34.                 rt.EZRequest("Play","Ok");
  35.                 break;
  36.             case BUT_STOP:
  37.                 rt.EZRequest("Stop","Ok");
  38.                 break;
  39.             case BUT_FORWARD:
  40.                 rt.EZRequest("Forward","Ok");
  41.                 break;
  42.             case BUT_REWIND:
  43.                 rt.EZRequest("Rewind","Ok");
  44.                 break;
  45.             case BUT_PAUSE:
  46.                 rt.EZRequest("Pause","Ok");
  47.                 break;
  48.             default:
  49.                 break;
  50.         }
  51.     default:
  52.         AFWindow::OnGadgetUp(imess);
  53.         break;
  54.   }
  55.         
  56. }
  57.  
  58. //////////////////////////////////////////////////////////////////////////////
  59. // MAIN
  60.  
  61. void main()
  62. {
  63.     AFAmigaApp theApp;
  64.     ControlWindow win;
  65.     AFRect rect(10,10,200,200);
  66.  
  67.     win.Create(&theApp,&rect,"AFrame TapeDeck Example");
  68.  
  69.     rect.SetRect(2,132,50,162);
  70.     win.td.Create(&win,&rect,100l);
  71.  
  72.     win.RefreshGadgets();
  73.  
  74.     theApp.RunApp();
  75. }
  76.